perm filename OMULTL.UNF[QLA,LSP] blob sn#742377 filedate 1984-02-08 generic text, type T, neo UTF8
'(THIS IS THE UNFASL FOR ((DSK (LSP RPG)) MULTL /21)) 
'(ASSEMBLED BY FASLAP /392) 
'(COMPILED BY LISP COMPILER /936 COMAUX /25 PHAS1 /84 MAKLAP /80 INITIA /117) 

;COMPILED ON FEBRUARY 8, 1984, AT 3:47 PM

;Loading DEFSTRUCT 280
'QUEUE 
	(COMMENT **FASL** 0. (LAP QUEUE-HEAD SUBR)) 
	(COMMENT **FASL** 3. (LAP QUEUE-TAIL SUBR)) 
	(COMMENT **FASL** 6. (LAP NEXT-QUEUE SUBR)) 
	(COMMENT **FASL** 8. (LAP ADD-QUEUE SUBR)) 
	(COMMENT **FASL** 32. (LAP GET-QUEUE SUBR)) 
	(COMMENT **FASL** 44. (LAP REMOVE-QUEUE SUBR)) 
	(COMMENT **FASL** 107. (LAP M-FLUSH-TOP-ARG-STACK SUBR)) 
'MACHINE 
'PROCESSOR 
'VALUE-DEST 
'JOB 
'RETURN-MESSAGE 
'JOB-CLOSURE 
	(COMMENT **FASL** 113. (LAP M-RESTORE-VALUEP SUBR)) 
'UNWIND-PROTECT-WAITER 
'UNWIND-PROTECT-CLEANUP 
'CATCH-RECORD 
	(COMMENT **FASL** 120. (LAP KILL-ALL-CLOSURE-JOBS SUBR)) 
	(COMMENT **FASL** 176. (LAP DELETE-EM-ALL SUBR)) 
	(COMMENT **FASL** 222. (LAP CURRENT-LOAD SUBR)) 
'METER 
	(COMMENT **FASL** 246. (LAP REPORT SUBR)) 
	(COMMENT **FASL** 420. (LAP RECENT-VAR-MEMQ SUBR)) 
	(COMMENT **FASL** 442. (LAP REPORT-LOAD-HISTORY SUBR)) 
	(COMMENT **FASL** 534. (LAP ROUND-FUN SUBR)) 
	(COMMENT **FASL** 546. (LAP STANDARD-DEVIATION SUBR)) 
	(COMMENT **FASL** 586. (LAP MULTI-PROCESS SUBR)) 
	(COMMENT **FASL** 740. (LAP PROCESS-JOB SUBR)) 
	(COMMENT **FASL** 1014. (LAP RETURN-MESSAGE SUBR)) 
	(COMMENT **FASL** 1061. (LAP MULTI-SCHEDULE SUBR)) 
	(COMMENT **FASL** 1077. (LAP MULTI-SCHEDULE-ONE SUBR)) 
	(COMMENT **FASL** 1135. (LAP RUN SUBR)) 
	(COMMENT **FASL** 1188. (LAP NOW SUBR)) 
	(COMMENT **FASL** 1190. (LAP M-ASSIGN SUBR)) 
	(COMMENT **FASL** 1265. (LAP M-LOOKUP-1 SUBR)) 
	(COMMENT **FASL** 1289. (LAP M-ADD-ENV SUBR)) 
	(COMMENT **FASL** 1294. (LAP M-ADD-ENV-1 SUBR)) 
	(COMMENT **FASL** 1298. (LAP M-SYMEVAL SUBR)) 
	(COMMENT **FASL** 1338. (LAP M-SYMEVAL-1 SUBR)) 
	(COMMENT **FASL** 1342. (LAP M-SYMEVAL-2 SUBR)) 
	(COMMENT **FASL** 1346. (LAP M-EVAL SUBR)) 
	(COMMENT **FASL** 2163. (LAP M-EVAL-2 SUBR)) 
	(COMMENT **FASL** 2174. (LAP M-PROGNIFY SUBR)) 
	(COMMENT **FASL** 2183. (LAP M-FUNCALL SUBR)) 
	(COMMENT **FASL** 2217. (LAP M-EVAL-LABELS SUBR)) 
	(COMMENT **FASL** 2297. (LAP M-QLAMBDA SUBR)) 
	(COMMENT **FASL** 2354. (LAP M-RESTORE-LOCK SUBR)) 
	(COMMENT **FASL** 2374. (LAP M-SET-LOCK SUBR)) 
	(COMMENT **FASL** 2379. (LAP M-EXPAND-CASEQ SUBR)) 
	(COMMENT **FASL** 2458. (LAP M-APPLY SUBR)) 
	(COMMENT **FASL** 2541. (LAP M-APPLY2 SUBR)) 
	(COMMENT **FASL** 2554. (LAP M-APPLY1 SUBR)) 
	(COMMENT **FASL** 2989. (LAP M-LISP-CALL SUBR)) 
	(COMMENT **FASL** 3027. (LAP M-RESTORE-ENV SUBR)) 
	(COMMENT **FASL** 3034. (LAP M-RESTORE-CATCH-THREAD SUBR)) 
	(COMMENT **FASL** 3041. (LAP M-RESTORE-CATCH-THREAD-1 SUBR)) 
	(COMMENT **FASL** 3048. (LAP M-STASH-ARG SUBR)) 
	(COMMENT **FASL** 3057. (LAP M-SLEEP SUBR)) 
	(COMMENT **FASL** 3064. (LAP M-DELAY SUBR)) 
	(COMMENT **FASL** 3090. (LAP M-ADD-CATCH-THREADS SUBR)) 
	(COMMENT **FASL** 3109. (LAP M-ADD-UNWIND-PROTECTS SUBR)) 
	(COMMENT **FASL** 3161. (LAP M-EVCOND SUBR)) 
	(COMMENT **FASL** 3238. (LAP M-EVOR SUBR)) 
	(COMMENT **FASL** 3281. (LAP M-EVAND SUBR)) 
	(COMMENT **FASL** 3324. (LAP M-EVNOT SUBR)) 
	(COMMENT **FASL** 3336. (LAP M-EVPROGN SUBR)) 
	(COMMENT **FASL** 3371. (LAP M-EVPROGN-1 SUBR)) 
	(COMMENT **FASL** 3407. (LAP M-EVSETQ SUBR)) 
	(COMMENT **FASL** 3453. (LAP M-ASSIGN-1 SUBR)) 
	(COMMENT **FASL** 3460. (LAP M-ASSIGN-2 SUBR)) 
	(COMMENT **FASL** 3468. (LAP M-EVQLAMBDA SUBR)) 
	(COMMENT **FASL** 3572. (LAP M-EAGER-EVQLAMBDA SUBR)) 
	(COMMENT **FASL** 3706. (LAP M-QLAMBDA-APPLY SUBR)) 
	(COMMENT **FASL** 3939. (LAP M-WAIT-FOR-MESSAGES SUBR)) 
	(COMMENT **FASL** 4058. (LAP M-WAIT-CLOSURE SUBR)) 
	(COMMENT **FASL** 4125. (LAP M-NULL-WAIT SUBR)) 
	(COMMENT **FASL** 4127. (LAP M-CLOSURE-WAITER SUBR)) 
	(COMMENT **FASL** 4181. (LAP M-QCATCH-WAITER SUBR)) 
	(COMMENT **FASL** 4199. (LAP M-WAIT-FOR-EAGER-VALUE SUBR)) 
	(COMMENT **FASL** 4207. (LAP M-WAIT-FOR-EAGER-CELL SUBR)) 
	(COMMENT **FASL** 4219. (LAP M-WAIT-VALUE-DEST SUBR)) 
	(COMMENT **FASL** 4229. (LAP SUSPEND-PROCESS LSUBR)) 
	(COMMENT **FASL** 4292. (LAP RESUME-PROCESS SUBR)) 
	(COMMENT **FASL** 4329. (LAP NO-RETURN-VALUE SUBR)) 
	(COMMENT **FASL** 4334. (LAP M-UNWIND-PROTECT-SIGNAL-DONE SUBR)) 
	(COMMENT **FASL** 4346. (LAP M-UNWIND-PROTECT-WAITER SUBR)) 
	(COMMENT **FASL** 4382. (LAP M-CATCH SUBR)) 
	(COMMENT **FASL** 4412. (LAP M-QCATCH SUBR)) 
	(COMMENT **FASL** 4424. (LAP M-THROW SUBR)) 
	(COMMENT **FASL** 4566. (LAP M-DO-UNWIND-PROTECT-CLEANUPS SUBR)) 
	(COMMENT **FASL** 4670. (LAP M-DO-ASSIGN SUBR)) 
	(COMMENT **FASL** 4699. (LAP M-DO-ASSIGN-1 SUBR)) 
	(COMMENT **FASL** 4728. (LAP M-DO-TEST SUBR)) 
	(COMMENT **FASL** 4774. (LAP M-DO-STEP SUBR)) 
	(COMMENT **FASL** 4802. (LAP M-DO-STEP-1 SUBR)) 
	(COMMENT **FASL** 4830. (LAP M-DEFUN FSUBR)) 
	(COMMENT **FASL** 4851. (LAP M-QDEFUN FSUBR)) 
	(COMMENT **FASL** 4879. (LAP ALLOCATE SUBR)) 
	(COMMENT **FASL** 4901. (LAP DE-ALLOCATE SUBR)) 
	(COMMENT **FASL** 4943. (LAP AREF SUBR)) 
	(COMMENT **FASL** 4950. (LAP ASET SUBR)) 
	(COMMENT **FASL** 4961. (LAP MAKE-ARRAY SUBR)) 
	(COMMENT **FASL** 4972. (LAP ≤ SUBR)) 
	(COMMENT **FASL** 4981. (LAP ≥ SUBR)) 
	(COMMENT **FASL** 4990. (LAP |SPAWN MACRO| SUBR)) 
	(COMMENT **FASL** 5022. (LAP |WAIT MACRO| SUBR)) 
	(COMMENT **FASL** 5047. (LAP |NO-WAIT MACRO| SUBR)) 
	(COMMENT **FASL** 5073. (LAP |QLET MACRO| SUBR)) 
	(COMMENT **FASL** 5145. (LAP MAKE-MULTI-PROCESSOR SUBR)) 
	(COMMENT **FASL** 5188. (LAP EVAL-FORMS LSUBR)) 
	(COMMENT **FASL** 5251. (LAP EVAL-FORM SUBR)) 
	(COMMENT **FASL** 5295. (LAP PRINT-JOBS SUBR)) 
	(COMMENT **FASL** 5359. (LAP MEVAL SUBR)) 
	(COMMENT **FASL** 5401. (LAP TOPLEVEL SUBR)) 
	(COMMENT **FASL** 5455. (LAP STARTUP LSUBR)) 
	(COMMENT **FASL** TOTAL =  5501. WORDS)